;########################################################################################
;#  Library
;#
;#  nudels0815
;#  initial Version: 15.10.06 02:50
;#
;########################################################################################
;# Requirement & Design:
;
;
;
;########################################################################################
;ToDo:
; 

/*
History:
$Log: lib.ahk,v $
Revision 1.1  2010/02/23 22:28:39  snoopy
*** empty log message ***



*/
;########################################################################################


SetBatchLines -1
StringCaseSense Off
AutoTrim Off

;#####################################################################
;Read Config Value
; 
; Verwendung:
;  #Include DATEINAME.ahk
;
;  <variable> := ReadConfigValue(ConfigFilePathName,"<section>","<variable>")
;  MsgBox, aus Configfile: %ConfigFilePathName%`nSection: %section%`nVariable:%variable%`nWert:%varible%   gelesen
;
;  mit zuvor gesetztem debug=1 werden Debug-Infos ausgegeben.
;#####################################################################


ReadConfigValue(ConfigFilePathName,Section,ConfigValue2Read)
{
  global debug              ;import global var
  IfNotExist, %ConfigFilePathName%
  {
    msgbox ERROR 002:`n Sorry, aber %ConfigFilePathName% konnte nicht gefunden werden...`n`nbitte snoopy fragen...
    ExitApp
  }
  IniRead, ConfigValueOut, %ConfigFilePathName%, %Section%, %ConfigValue2Read%
  if (ConfigValueOut == "ERROR")
  {
    msgbox ERROR 001:`n Sorry, aber %ConfigValue2Read% konnte im KonfigFile nicht gefunden werden...`n`n bitte snoopy fragen...
    ExitApp
  }
  if (debug==1)
  {
    msgbox Section: %Section%`nin: %ConfigValue2Read%`nout: %ConfigValueOut%
  }
  return %ConfigValueOut%
}

WriteConfigValue(ConfigFilePathName,Section,ConfigValue2Write,Value)
{
  global debug                                    ;import global var
  IfNotExist, %ConfigFilePathName%
  {
    msgbox ERROR 002:`n Sorry, aber %ConfigFilePathName% konnte nicht gefunden werden...`n`nbitte snoopy fragen...
    ExitApp
  }
  IniWrite,%Value%,%ConfigFilePathName%,%Section%,%ConfigValue2Write%
  if ErrorLevel = 1
  {
    msgbox ERROR 003:`n Sorry, aber ok konnte nicht geschrieben werden
    ExitApp
  }
  if (debug==1)
  {
    msgbox Section: %Section%`nwrite: %ConfigValue2Write%`nValue: %Value%
  }
}

;#####################################################################

